home *** CD-ROM | disk | FTP | other *** search
/ Aminet 52 / Aminet 52 (2002)(GTI - Schatztruhe)[!][Dec 2002].iso / Aminet / dev / gg / ncurses-5.3.lha / ncurses-5.3 / form / fld_link.c < prev    next >
C/C++ Source or Header  |  2002-10-24  |  4KB  |  93 lines
  1. /****************************************************************************
  2.  * Copyright (c) 1998,2000 Free Software Foundation, Inc.                   *
  3.  *                                                                          *
  4.  * Permission is hereby granted, free of charge, to any person obtaining a  *
  5.  * copy of this software and associated documentation files (the            *
  6.  * "Software"), to deal in the Software without restriction, including      *
  7.  * without limitation the rights to use, copy, modify, merge, publish,      *
  8.  * distribute, distribute with modifications, sublicense, and/or sell       *
  9.  * copies of the Software, and to permit persons to whom the Software is    *
  10.  * furnished to do so, subject to the following conditions:                 *
  11.  *                                                                          *
  12.  * The above copyright notice and this permission notice shall be included  *
  13.  * in all copies or substantial portions of the Software.                   *
  14.  *                                                                          *
  15.  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS  *
  16.  * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF               *
  17.  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.   *
  18.  * IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM,   *
  19.  * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR    *
  20.  * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR    *
  21.  * THE USE OR OTHER DEALINGS IN THE SOFTWARE.                               *
  22.  *                                                                          *
  23.  * Except as contained in this notice, the name(s) of the above copyright   *
  24.  * holders shall not be used in advertising or otherwise to promote the     *
  25.  * sale, use or other dealings in this Software without prior written       *
  26.  * authorization.                                                           *
  27.  ****************************************************************************/
  28.  
  29. /****************************************************************************
  30.  *   Author:  Juergen Pfeifer, 1995,1997                                    *
  31.  *   Contact: http://www.familiepfeifer.de/Contact.aspx?Lang=en             *
  32.  ****************************************************************************/
  33.  
  34. #include "form.priv.h"
  35.  
  36. MODULE_ID("$Id: fld_link.c,v 1.6 2002/07/06 15:33:27 juergen Exp $")
  37.  
  38. /*---------------------------------------------------------------------------
  39. |   Facility      :  libnform  
  40. |   Function      :  FIELD *link_field(FIELD *field, int frow, int fcol)  
  41. |   
  42. |   Description   :  Duplicates the field at the specified position. The
  43. |                    new field shares its buffers with the original one,
  44. |                    the attributes are independent.
  45. |                    If an error occurs, errno is set to
  46. |                    
  47. |                    E_BAD_ARGUMENT - invalid argument
  48. |                    E_SYSTEM_ERROR - system error
  49. |
  50. |   Return Values :  Pointer to the new field or NULL if failure
  51. +--------------------------------------------------------------------------*/
  52. NCURSES_EXPORT(FIELD *)
  53. link_field (FIELD * field, int frow, int fcol)
  54. {
  55.   FIELD *New_Field = (FIELD *)0;
  56.   int err = E_BAD_ARGUMENT;
  57.  
  58.   if (field && (frow>=0) && (fcol>=0) &&
  59.       ((err=E_SYSTEM_ERROR) != 0) && /* trick: this resets the default error */
  60.       (New_Field = (FIELD *)malloc(sizeof(FIELD))) )
  61.     {
  62.       *New_Field        = *_nc_Default_Field;
  63.       New_Field->frow   = frow;
  64.       New_Field->fcol   = fcol;
  65.       New_Field->link   = field->link;
  66.       field->link       = New_Field;
  67.       New_Field->buf    = field->buf;
  68.       New_Field->rows   = field->rows;
  69.       New_Field->cols   = field->cols;
  70.       New_Field->nrow   = field->nrow;
  71.       New_Field->nbuf   = field->nbuf;
  72.       New_Field->drows  = field->drows;
  73.       New_Field->dcols  = field->dcols;
  74.       New_Field->maxgrow= field->maxgrow;
  75.       New_Field->just   = field->just;
  76.       New_Field->fore   = field->fore;
  77.       New_Field->back   = field->back;
  78.       New_Field->pad    = field->pad;
  79.       New_Field->opts   = field->opts;
  80.       New_Field->usrptr = field->usrptr;
  81.       if (_nc_Copy_Type(New_Field,field)) 
  82.     return New_Field;
  83.     }
  84.  
  85.   if (New_Field) 
  86.     free_field(New_Field);
  87.  
  88.   SET_ERROR( err );
  89.   return (FIELD *)0;
  90. }
  91.  
  92. /* fld_link.c ends here */
  93.